home *** CD-ROM | disk | FTP | other *** search
/ Multimedia Dogs / Multimedia Dogs v2.0.iso / mac / Extras / MMDogs 2.0 with Desktop / MMDOGS2.DXR / 00260_BreedDatabaseCode.ls < prev    next >
Encoding:
Text File  |  1995-10-09  |  21.7 KB  |  10 lines
  1. global gBreedDatabase, gBreedDatabaseCount, gBreedDatabaseByCode, gBreedDatabaseByGroup, gBreedDatabaseByWorld
  2.  
  3. on initBreedDatabase
  4.   set gBreedDatabase to [["Affenpinscher", "affento", "toys", "eeurope", "Germany", [1, 1, 3, 4, 2, 2, 4, 1]], ["Afghan Hound", "afghaho", "hounds", "ewasia", "Afghanistan", [5, 4, 4, 3, 5, 5, 4, 3]], ["Airedale Terrier", "airedte", "terriers", "england", "Yorkshire", [4, 4, 3, 5, 3, 3, 4, 4]], ["Akbash", "akbasra", "rare", "mideast", "Turkey", [4, 3, 3, 3, 4, 3, 4, 4]], ["Akita", "akitawo", "working", "ewasia", "Japan", [5, 4, 3, 3, 3, 4, 4, 5]], ["Alaskan Malamute", "almalwo", "working", "namerica", "Alaska", [4, 4, 4, 5, 3, 4, 4, 4]], ["American Bulldog", "amebura", "rare", "namerica", "USA", [4, 3, 3, 3, 4, 2, 3, 4]], ["American Eskimo Dog", "amereno", "nonsport", "namerica", "USA", [2, 3, 3, 4, 3, 3, 3, 3]], ["American Foxhound", "amfoxho", "hounds", "namerica", "Virginia", [4, 4, 3, 5, 2, 1, 3, 3]], ["American Pitbull Terrier", "amepira", "rare", "namerica", "USA", [3, 3, 4, 3, 3, 2, 3, 4]], ["American Staffordshire Terrier", "amstste", "terriers", "namerica", "USA", [3, 3, 3, 3, 4, 2, 4, 4]], ["American Water Spaniel", "amwspsp", "sporting", "namerica", "Midwest USA", [2, 3, 2, 4, 4, 2, 4, 3]], ["Anatolian Shepherd", "anashra", "rare", "mideast", "Turkey", [5, 4, 3, 4, 3, 3, 3, 4]], ["Annie", "anniemu", "mutts", "namerica", "Colorado", [4, 3, 3, 5, 2, 3, 4, 3]], ["Argentine Dogo", "argdora", "rare", "samerica", "Argentina", [4, 4, 3, 3, 3, 2, 3, 4]], ["Australian Cattle Dog", "auscdhe", "herding", "australi", "Sydney", [3, 4, 3, 4, 3, 2, 4, 4]], ["Australian Kelpie", "auskera", "rare", "australi", "Australia", [3, 3, 3, 4, 4, 2, 3, 3]], ["Australian Shepherd", "ausshe", "herding", "weurope", "Spain", [3, 3, 3, 4, 2, 3, 2, 3]], ["Australian Terrier", "austrte", "terriers", "australi", "Victoria", [1, 2, 2, 4, 3, 2, 3, 2]], ["Azawakh", "azawara", "rare", "africa", "Mali", [4, 3, 3, 3, 3, 1, 2, 2]], ["Bacchus", "bacchmu", "mutts", "namerica", "Colorado", [4, 4, 3, 5, 2, 4, 4, 4]], ["Bandit", "bandimu", "mutts", "namerica", "Colorado", [4, 3, 5, 4, 4, 3, 4, 4]], ["Basenji", "basenho", "hounds", "africa", "Central Africa", [2, 3, 2, 4, 4, 1, 4, 2]], ["Basset Hound", "basseho", "hounds", "weurope", "France", [2, 2, 3, 2, 2, 2, 1, 2]], ["Beagle", "beaglho", "hounds", "weurope", "France", [2, 3, 4, 4, 1, 1, 1, 2]], ["Bearded Collie", "beacohe", "herding", "england", "England", [3, 4, 3, 4, 2, 3, 3, 3]], ["Beauceron", "beaucra", "rare", "weurope", "France", [4, 3, 3, 4, 3, 2, 3, 4]], ["Bedlington Terrier", "bedlite", "terriers", "england", "Bedlington", [3, 3, 3, 4, 3, 2, 3, 2]], ["Belgian Malinois", "belmahe", "herding", "weurope", "Belgium", [4, 4, 1, 4, 4, 3, 3, 3]], ["Belgian Sheepdog", "belshhe", "herding", "weurope", "Belgium", [4, 4, 1, 4, 4, 3, 3, 3]], ["Belgian Tervuren", "beltehe", "herding", "weurope", "Belgium", [4, 4, 1, 4, 4, 3, 4, 4]], ["Bernese Mountain Dog", "bermdwo", "working", "weurope", "Switzerland", [4, 4, 3, 3, 2, 4, 2, 4]], ["Bichon Frise", "bichfno", "nonsport", "africa", "Canary Islands", [1, 1, 1, 3, 1, 2, 1, 1]], ["Biko", "bikomu", "mutts", "namerica", "Colorado", [4, 3, 3, 5, 2, 4, 3, 4]], ["Birtie & Roman", "birtimu", "mutts", "namerica", "Colorado", [3, 4, 3, 4, 3, 2, 3, 3]], ["Black and Tan Coonhound", "blacoho", "hounds", "england", "England", [4, 4, 4, 4, 3, 2, 3, 3]], ["Bloodhound", "bloodho", "hounds", "weurope", "Belgium", [4, 4, 3, 3, 1, 2, 1, 2]], ["Border Collie", "bordche", "herding", "ireland", "Scotland", [3, 4, 3, 4, 3, 3, 3, 3]], ["Border Terrier", "bordete", "terriers", "ireland", "Cheviot Hills", [2, 2, 2, 4, 2, 2, 1, 2]], ["Borzoi", "borzoho", "hounds", "nasia", "Russia", [5, 4, 3, 4, 4, 4, 4, 2]], ["Boston Terrier", "bosteno", "nonsport", "namerica", "Boston", [3, 2, 2, 3, 2, 1, 2, 2]], ["Bouvier de Flandres", "bouflhe", "herding", "weurope", "Belgium", [4, 3, 2, 3, 2, 4, 2, 4]], ["Boxer", "boxerwo", "working", "eeurope", "Germany", [4, 3, 3, 4, 2, 2, 2, 4]], ["Briard", "briarhe", "herding", "weurope", "France", [4, 4, 4, 5, 3, 4, 3, 5]], ["Brittany", "brittsp", "sporting", "weurope", "France", [3, 4, 2, 4, 1, 3, 1, 3]], ["Brussels Griffon", "brugrto", "toys", "weurope", "Belgium", [1, 1, 2, 4, 2, 2, 3, 1]], ["Buddy", "buddymu", "mutts", "namerica", "Colorado", [2, 3, 2, 4, 3, 3, 1, 1]], ["Bull Terrier", "bullte", "terriers", "england", "England", [3, 3, 4, 4, 3, 1, 3, 3]], ["Bulldog", "bulldno", "nonsport", "england", "England", [3, 2, 4, 2, 1, 1, 2, 3]], ["Bullmastiff", "bulmawo", "working", "england", "England", [5, 4, 2, 3, 2, 2, 2, 5]], ["Cairn Terrier", "cairnte", "terriers", "ireland", "Scotland", [1, 2, 2, 3, 2, 2, 4, 2]], ["Canaan Dog", "candora", "rare", "mideast", "Israel", [3, 3, 2, 3, 3, 2, 3, 3]], ["Cane Corso", "cancora", "rare", "weurope", "Italy", [4, 4, 3, 4, 3, 2, 3, 4]], ["Cardigan Welsh Corgi", "carwche", "herding", "england", "Wales", [2, 3, 2, 4, 2, 2, 2, 3]], ["Caucasian Mountain Dog", "caumtra", "rare", "nasia", "Republic of Georgia", [5, 4, 4, 4, 4, 4, 4, 4]], ["Cavalier King Charles Spaniel", "cavkira", "rare", "england", "England", [2, 2, 2, 2, 2, 3, 2, 2]], ["Cesky Terrier", "ceskyra", "rare", "eeurope", "Czechoslovakia", [2, 2, 2, 2, 2, 2, 2, 2]], ["Chesapeake Bay Retriever", "chbaysp", "sporting", "namerica", "Maryland", [4, 4, 3, 3, 2, 3, 2, 4]], ["Chihuahua", "chihuto", "toys", "namerica", "Mexico", [1, 1, 2, 4, 4, 2, 4, 1]], ["Chinese Crested", "chincto", "toys", "ewasia", "China", [2, 2, 3, 4, 3, 3, 3, 1]], ["Chinese Shar-Pei", "chispno", "nonsport", "ewasia", "China", [3, 3, 2, 3, 1, 2, 3, 2]], ["Chow Chow", "chowcno", "nonsport", "ewasia", "China", [3, 3, 3, 3, 4, 4, 5, 4]], ["Clumber Spaniel", "cluspsp", "sporting", "weurope", "France", [3, 2, 3, 1, 1, 4, 1, 1]], ["Cocker Spaniel", "cocspsp", "sporting", "namerica", "USA", [2, 2, 2, 3, 1, 3, 1, 2]], ["Collie", "collihe", "herding", "ireland", "Scotland", [4, 3, 2, 3, 2, 4, 1, 3]], ["Coton de Tulear", "cottura", "rare", "africa", "Madagascar", [1, 1, 1, 2, 2, 1, 1, 1]], ["Curly-Coated Retriever", "curlysp", "sporting", "england", "England", [4, 3, 2, 3, 2, 3, 2, 3]], ["Dachshund", "dachsho", "hounds", "eeurope", "Germany", [2, 2, 3, 4, 4, 2, 3, 3]], ["Dalmatian", "dalmano", "nonsport", "eeurope", "Dalmatia", [3, 4, 2, 5, 2, 1, 2, 3]], ["Dandie Dinmont Terrier", "dandite", "terriers", "ireland", "Scotland", [1, 2, 2, 3, 3, 2, 2, 2]], ["Doberman Pinscher", "dobpiwo", "working", "eeurope", "Germany", [4, 3, 2, 5, 3, 2, 4, 5]], ["Dogue de Bordeaux", "dogbora", "rare", "weurope", "France", [5, 3, 3, 3, 3, 2, 3, 4]], ["English Cocker Spaniel", "engcosp", "sporting", "weurope", "Spain", [2, 3, 3, 4, 1, 3, 1, 3]], ["English Foxhound", "engfoho", "hounds", "england", "England", [4, 5, 4, 5, 4, 1, 3, 3]], ["English Setter", "engsesp", "sporting", "england", "England", [4, 4, 4, 4, 1, 4, 1, 3]], ["English Springer Spaniel", "engspsp", "sporting", "england", "England", [3, 4, 3, 4, 1, 4, 1, 3]], ["English Toy Spaniel", "engtsto", "toys", "ewasia", "Japan", [1, 1, 3, 2, 2, 3, 3, 1]], ["Entlebucher Sennehund", "entsera", "rare", "weurope", "Switzerland", [3, 3, 2, 3, 2, 2, 2, 3]], ["Field Spaniel", "fiespsp", "sporting", "england", "England", [3, 4, 2, 5, 1, 3, 1, 3]], ["Fila Brasileiro", "filbrra", "rare", "samerica", "Brazil", [4, 4, 3, 4, 4, 3, 3, 4]], ["Finnish Spitz", "finspno", "nonsport", "scandina", "Finland", [3, 3, 3, 4, 3, 4, 3, 2]], ["Flat-Coated Retriever", "flatrsp", "sporting", "england", "England", [4, 4, 2, 4, 1, 3, 1, 3]], ["French Bulldog", "frbulno", "nonsport", "weurope", "France", [2, 2, 2, 3, 2, 1, 3, 2]], ["German Pinscher", "gerpira", "rare", "eeurope", "Germany", [3, 3, 2, 3, 2, 2, 2, 3]], ["German Shepherd Dog", "gershhe", "herding", "eeurope", "Germany", [4, 4, 1, 4, 2, 3, 3, 5]], ["German Shorthaired Pointer", "gershsp", "sporting", "eeurope", "Germany", [4, 5, 3, 5, 3, 1, 4, 3]], ["German Wirehaired Pointer", "gerwisp", "sporting", "eeurope", "Germany", [4, 5, 3, 5, 4, 2, 4, 4]], ["Giant Schnauzer", "gischwo", "working", "eeurope", "Germany", [5, 4, 2, 4, 4, 3, 4, 5]], ["Golden Retriever", "goldrsp", "sporting", "england", "England", [4, 3, 2, 3, 1, 4, 1, 2]], ["Gordon Setter", "gorsesp", "sporting", "ireland", "Scotland", [4, 4, 2, 4, 2, 3, 1, 3]], ["Great Dane", "gredawo", "working", "eeurope", "Germany", [5, 3, 3, 3, 2, 2, 2, 3]], ["Great Pyrenees", "grepywo", "working", "weurope", "Pyrenees Mountains", [5, 4, 3, 3, 3, 5, 4, 4]], ["Greater Swiss Mountain Dog", "greswra", "rare", "weurope", "Switzerland", [4, 3, 2, 3, 2, 2, 3, 3]], ["Greyhound", "greyhho", "hounds", "africa", "Egypt", [4, 3, 3, 3, 2, 1, 2, 3]], ["Harrier", "harriho", "hounds", "england", "England", [3, 4, 3, 5, 3, 2, 2, 3]], ["Havanese", "havanra", "rare", "namerica", "Cuba", [1, 1, 2, 2, 2, 1, 1, 2]], ["Herman", "hermamu", "mutts", "samerica", "Republica de Queso", [1, 1, 5, 5, 5, 1, 5, 5]], ["Ibizan Hound", "ibizaho", "hounds", "africa", "Egypt", [4, 3, 2, 4, 3, 2, 3, 3]], ["Irish Red & White Setter", "irsrera", "rare", "ireland", "Ireland", [4, 4, 3, 4, 2, 4, 3, 3]], ["Irish Setter", "irsetsp", "sporting", "ireland", "Ireland", [4, 4, 2, 5, 1, 3, 2, 2]], ["Irish Terrier", "irishte", "terriers", "ireland", "Ireland", [2, 3, 3, 4, 2, 2, 4, 3]], ["Irish Water Spaniel", "irwspsp", "sporting", "ireland", "Ireland", [4, 4, 3, 4, 4, 3, 5, 3]], ["Irish Wolfhound", "iriwoho", "hounds", "ireland", "Ireland", [5, 3, 2, 3, 2, 3, 2, 2]], ["Italian Greyhound", "itgreto", "toys", "mideast", "Turkey", [2, 2, 2, 3, 3, 1, 2, 1]], ["Italian Spinone", "itaspra", "rare", "weurope", "Italy", [4, 3, 3, 3, 2, 3, 3, 2]], ["Jack Russell Terrier", "jacrura", "rare", "england", "England", [2, 3, 2, 3, 3, 2, 2, 3]], ["Jake", "jakemu", "mutts", "namerica", "Colorado", [3, 4, 3, 4, 1, 4, 3, 3]], ["Japanese Chin", "japchto", "toys", "ewasia", "China", [1, 1, 1, 3, 1, 2, 2, 1]], ["Karelian Bear Dog", "karbera", "rare", "nasia", "Russia", [3, 4, 3, 4, 4, 3, 3, 4]], ["Keeshond", "keeshno", "nonsport", "weurope", "Netherlands", [3, 3, 2, 4, 1, 4, 2, 3]], ["Kerry Blue Terrier", "kerblte", "terriers", "ireland", "Ireland", [3, 3, 4, 4, 2, 1, 3, 3]], ["Klee Kai", "klekara", "rare", "namerica", "USA", [2, 2, 2, 3, 3, 2, 2, 2]], ["Komondor", "komonwo", "working", "eeurope", "Hungary", [4, 5, 4, 5, 4, 4, 4, 5]], ["Kuvasz", "kuvaswo", "working", "ewasia", "Tibet", [5, 5, 4, 4, 4, 3, 5, 5]], ["Kyi-Leo", "kyelera", "rare", "ewasia", "Tibet", [1, 2, 2, 2, 2, 3, 2, 1]], ["Labrador Retriever", "labresp", "sporting", "namerica", "Newfoundland", [4, 3, 2, 3, 2, 2, 1, 3]], ["Lakeland Terrier", "lakelte", "terriers", "england", "Lake District", [2, 3, 3, 4, 3, 2, 3, 2]], ["Leonberger", "leonbra", "rare", "eeurope", "Germany", [5, 4, 3, 3, 3, 4, 3, 4]], ["Lhasa Apso", "lhasano", "nonsport", "ewasia", "Tibet", [1, 2, 2, 4, 2, 4, 3, 2]], ["Louisiana Catahoula", "loucara", "rare", "namerica", "Louisiana", [4, 4, 3, 4, 4, 2, 3, 4]], ["Lowchen", "lowchra", "rare", "weurope", "France", [2, 2, 2, 2, 2, 2, 2, 2]], ["Maltese", "malteto", "toys", "africa", "Malta", [1, 1, 2, 3, 3, 4, 3, 1]], ["Manchester Terrier", "manchte", "terriers", "england", "Manchester", [2, 3, 3, 4, 3, 2, 4, 2]], ["Maremma Sheepdog", "marshra", "rare", "weurope", "Italy", [4, 4, 2, 4, 2, 3, 3, 4]], ["Mastiff", "mastiwo", "working", "england", "England", [5, 3, 4, 3, 2, 3, 2, 4]], ["Miniature Bull Terrier", "minbute", "terriers", "england", "England", [2, 2, 2, 3, 2, 1, 3, 2]], ["Miniature Pinscher", "minpito", "toys", "eeurope", "Germany", [2, 3, 3, 4, 3, 1, 3, 2]], ["Miniature Schnauzer", "minscte", "terriers", "england", "England", [2, 3, 3, 4, 2, 2, 3, 2]], ["Neapolitan Mastiff", "neomara", "rare", "weurope", "Italy", [5, 4, 3, 3, 3, 2, 3, 4]], ["Newfoundland", "newfowo", "working", "namerica", "Newfoundland", [5, 3, 2, 3, 1, 5, 1, 3]], ["Norfolk Terrier", "norfote", "terriers", "england", "Norfolk", [1, 2, 3, 4, 3, 1, 3, 2]], ["Norwegian Elkhound", "norelho", "hounds", "scandina", "Norway", [3, 4, 3, 4, 3, 4, 3, 4]], ["Norwegian Lundehund", "nowlura", "rare", "scandina", "Norway", [2, 2, 2, 3, 3, 3, 2, 3]], ["Norwich Terrier", "norwite", "terriers", "england", "Norwich", [1, 2, 3, 4, 3, 1, 3, 2]], ["Old English Sheepdog", "olenshe", "herding", "england", "England", [4, 4, 3, 4, 1, 4, 1, 3]], ["Otterhound", "otterho", "hounds", "england", "England", [4, 3, 3, 3, 1, 4, 1, 3]], ["Papillon", "papilto", "toys", "weurope", "Spain", [1, 2, 2, 3, 2, 3, 3, 1]], ["Pekingese", "pekinto", "toys", "ewasia", "China", [1, 1, 3, 3, 4, 3, 4, 1]], ["Pembroke Welsh Corgi", "pemwche", "herding", "england", "Wales", [2, 3, 2, 4, 2, 2, 2, 3]], ["Peruvian Inca Orchid", "perinra", "rare", "samerica", "South America", [3, 2, 3, 2, 4, 1, 3, 3]], ["Petit Basset Griffon Vendeen", "pebgvho", "hounds", "weurope", "France", [2, 2, 3, 3, 3, 3, 3, 2]], ["Pharaoh Hound", "pharaho", "hounds", "africa", "Egypt", [4, 4, 3, 4, 2, 2, 2, 2]], ["Plott Hound", "plohora", "rare", "namerica", "USA", [3, 4, 3, 4, 3, 2, 3, 3]], ["Pointer", "poiersp", "sporting", "weurope", "Spain", [4, 4, 4, 5, 3, 1, 3, 3]], ["Pomeranian", "pomerto", "toys", "eeurope", "Germany", [1, 2, 4, 3, 4, 3, 4, 1]], ["Poodle", "poodlno", "nonsport", "weurope", "France", [3, 2, 1, 3, 2, 1, 3, 2]], ["Portuguese Water Dog", "porwdwo", "working", "weurope", "Portugal", [3, 4, 3, 3, 3, 2, 4, 2]], ["Presa Canario", "precara", "rare", "africa", "Canary Islands", [4, 4, 4, 3, 3, 2, 3, 4]], ["Pug", "pugto", "toys", "ewasia", "China", [1, 1, 2, 2, 2, 1, 1, 1]], ["Puli", "pulihe", "herding", "eeurope", "Hungary", [3, 4, 4, 5, 3, 3, 5, 4]], ["Rat Terrier", "rattera", "rare", "england", "England", [2, 3, 3, 3, 2, 1, 2, 3]], ["Rhodesian Ridgeback", "rhoriho", "hounds", "africa", "South Africa", [4, 4, 2, 4, 3, 1, 3, 5]], ["Rottweiler", "rottwwo", "working", "eeurope", "Germany", [4, 3, 2, 3, 3, 2, 3, 5]], ["Saint Bernard", "saberwo", "working", "weurope", "Switzerland", [5, 3, 2, 3, 2, 4, 1, 3]], ["Saluki", "salukho", "hounds", "africa", "Egypt", [4, 4, 3, 4, 4, 4, 5, 2]], ["Samoyed", "samoywo", "working", "nasia", "Siberia", [3, 3, 3, 4, 2, 5, 2, 2]], ["Schipperke", "schipno", "nonsport", "weurope", "Belgium", [2, 3, 3, 4, 3, 3, 4, 3]], ["Scottish Deerhound", "scodeho", "hounds", "ireland", "Scotland", [5, 4, 3, 3, 2, 3, 2, 2]], ["Scottish Terrier", "scottte", "terriers", "ireland", "Scotland", [1, 2, 3, 4, 4, 3, 4, 2]], ["Sealyham Terrier", "sealyte", "terriers", "england", "Wales", [1, 1, 3, 2, 3, 3, 3, 2]], ["Shetland Sheepdog", "sheshhe", "herding", "ireland", "Shetland Islands", [2, 3, 1, 4, 3, 4, 3, 3]], ["Shiba Inu", "shibato", "toys", "ewasia", "Japan", [2, 2, 2, 3, 2, 2, 2, 3]], ["Shih Tzu", "shitzto", "toys", "ewasia", "Tibet", [1, 1, 3, 2, 2, 4, 2, 1]], ["Shiloh Shepherd", "shishra", "rare", "namerica", "USA", [5, 4, 3, 4, 4, 3, 3, 4]], ["Siberian Husky", "sibhuwo", "working", "nasia", "Siberia", [3, 4, 3, 5, 2, 5, 3, 2]], ["Silky Terrier", "silktto", "toys", "australi", "New South Wales", [1, 1, 2, 3, 2, 4, 3, 1]], ["Skye Terrier", "skyete", "terriers", "ireland", "Skye", [1, 1, 3, 2, 3, 3, 3, 2]], ["Smooth Fox Terrier", "smoofte", "terriers", "england", "England", [2, 3, 3, 4, 3, 2, 3, 2]], ["Soft Coated Wheaten Terrier", "sofcwte", "terriers", "ireland", "Ireland", [3, 3, 3, 4, 1, 3, 1, 2]], ["Staffordshire Bull Terrier", "stabute", "terriers", "england", "England", [2, 2, 2, 3, 3, 1, 3, 3]], ["Standard Schnauzer", "stschwo", "working", "eeurope", "Germany", [3, 3, 3, 4, 4, 2, 3, 4]], ["Sussex Spaniel", "susspsp", "sporting", "england", "Sussex", [2, 2, 4, 3, 2, 3, 1, 3]], ["Tibetan KyiApso", "tibkyra", "rare", "ewasia", "Tibet", [4, 4, 3, 4, 2, 4, 3, 4]], ["Tibetan Mastiff", "tibmara", "rare", "ewasia", "Tibet", [5, 4, 3, 4, 3, 3, 3, 4]], ["Tibetan Spaniel", "tibspno", "nonsport", "ewasia", "Tibet", [1, 1, 3, 3, 3, 3, 3, 1]], ["Tibetan Terrier", "tibteno", "nonsport", "ewasia", "Tibet", [2, 2, 3, 3, 3, 3, 4, 2]], ["Tosa Inu", "tosinra", "rare", "ewasia", "Japan", [4, 4, 4, 3, 4, 2, 3, 4]], ["Tosha", "toshamu", "mutts", "namerica", "Colorado", [4, 2, 2, 2, 2, 5, 2, 4]], ["Vizsla", "vizslsp", "sporting", "eeurope", "Hungary", [4, 4, 2, 4, 1, 1, 2, 3]], ["Weimaraner", "weimasp", "sporting", "eeurope", "Germany", [4, 4, 3, 5, 3, 1, 4, 5]], ["Welsh Springer Spaniel", "welspsp", "sporting", "england", "Wales", [3, 3, 3, 4, 3, 3, 2, 3]], ["Welsh Terrier", "welshte", "terriers", "england", "Wales", [2, 3, 3, 4, 3, 2, 3, 2]], ["West Highland White Terrier", "weshwte", "terriers", "ireland", "Scotland", [1, 2, 2, 3, 2, 3, 3, 2]], ["Whippet", "whippho", "hounds", "england", "England", [3, 2, 2, 3, 3, 1, 3, 2]], ["Wire Fox Terrier", "wirefte", "terriers", "england", "England", [2, 3, 3, 4, 3, 2, 3, 2]], ["Wirehaired Pointing Griffon", "wpgrisp", "sporting", "weurope", "Netherlands", [4, 4, 2, 4, 3, 3, 4, 3]], ["Yorkshire Terrier", "yorktto", "toys", "england", "Yorkshire", [1, 2, 3, 4, 3, 4, 3, 1]]]
  5.   set gBreedDatabaseCount to count(gBreedDatabase)
  6.   set gBreedDatabaseByCode to ["affento": [1], "afghaho": [2], "airedte": [3], "akbasra": [4], "akitawo": [5], "almalwo": [6], "amebura": [7], "amepira": [10], "amereno": [8], "amfoxho": [9], "amstste": [11], "amwspsp": [12], "anashra": [13], "anniemu": [14], "argdora": [15], "auscdhe": [16], "auskera": [17], "ausshe": [18], "austrte": [19], "azawara": [20], "bacchmu": [21], "bandimu": [22], "basenho": [23], "basseho": [24], "beacohe": [26], "beaglho": [25], "beaucra": [27], "bedlite": [28], "belmahe": [29], "belshhe": [30], "beltehe": [31], "bermdwo": [32], "bichfno": [33], "bikomu": [34], "birtimu": [35], "blacoho": [36], "bloodho": [37], "bordche": [38], "bordete": [39], "borzoho": [40], "bosteno": [41], "bouflhe": [42], "boxerwo": [43], "briarhe": [44], "brittsp": [45], "brugrto": [46], "buddymu": [47], "bulldno": [49], "bullte": [48], "bulmawo": [50], "cairnte": [51], "cancora": [53], "candora": [52], "carwche": [54], "caumtra": [55], "cavkira": [56], "ceskyra": [57], "chbaysp": [58], "chihuto": [59], "chincto": [60], "chispno": [61], "chowcno": [62], "cluspsp": [63], "cocspsp": [64], "collihe": [65], "cottura": [66], "curlysp": [67], "dachsho": [68], "dalmano": [69], "dandite": [70], "dobpiwo": [71], "dogbora": [72], "engcosp": [73], "engfoho": [74], "engsesp": [75], "engspsp": [76], "engtsto": [77], "entsera": [78], "fiespsp": [79], "filbrra": [80], "finspno": [81], "flatrsp": [82], "frbulno": [83], "gerpira": [84], "gershhe": [85], "gershsp": [86], "gerwisp": [87], "gischwo": [88], "goldrsp": [89], "gorsesp": [90], "gredawo": [91], "grepywo": [92], "greswra": [93], "greyhho": [94], "harriho": [95], "havanra": [96], "hermamu": [97], "ibizaho": [98], "irishte": [101], "iriwoho": [103], "irsetsp": [100], "irsrera": [99], "irwspsp": [102], "itaspra": [105], "itgreto": [104], "jacrura": [106], "jakemu": [107], "japchto": [108], "karbera": [109], "keeshno": [110], "kerblte": [111], "klekara": [112], "komonwo": [113], "kuvaswo": [114], "kyelera": [115], "labresp": [116], "lakelte": [117], "leonbra": [118], "lhasano": [119], "loucara": [120], "lowchra": [121], "malteto": [122], "manchte": [123], "marshra": [124], "mastiwo": [125], "minbute": [126], "minpito": [127], "minscte": [128], "neomara": [129], "newfowo": [130], "norelho": [132], "norfote": [131], "norwite": [134], "nowlura": [133], "olenshe": [135], "otterho": [136], "papilto": [137], "pebgvho": [141], "pekinto": [138], "pemwche": [139], "perinra": [140], "pharaho": [142], "plohora": [143], "poiersp": [144], "pomerto": [145], "poodlno": [146], "porwdwo": [147], "precara": [148], "pugto": [149], "pulihe": [150], "rattera": [151], "rhoriho": [152], "rottwwo": [153], "saberwo": [154], "salukho": [155], "samoywo": [156], "schipno": [157], "scodeho": [158], "scottte": [159], "sealyte": [160], "sheshhe": [161], "shibato": [162], "shishra": [164], "shitzto": [163], "sibhuwo": [165], "silktto": [166], "skyete": [167], "smoofte": [168], "sofcwte": [169], "stabute": [170], "stschwo": [171], "susspsp": [172], "tibkyra": [173], "tibmara": [174], "tibspno": [175], "tibteno": [176], "toshamu": [178], "tosinra": [177], "vizslsp": [179], "weimasp": [180], "welshte": [182], "welspsp": [181], "weshwte": [183], "whippho": [184], "wirefte": [185], "wpgrisp": [186], "yorktto": [187]]
  7.   set gBreedDatabaseByGroup to ["herding": [16, 18, 26, 29, 30, 31, 38, 42, 44, 54, 65, 85, 135, 139, 150, 161], "hounds": [2, 9, 23, 24, 25, 36, 37, 40, 68, 74, 94, 95, 98, 103, 132, 136, 141, 142, 152, 155, 158, 184], "mutts": [14, 21, 22, 34, 35, 47, 97, 107, 178], "nonsport": [8, 33, 41, 49, 61, 62, 69, 81, 83, 110, 119, 146, 157, 175, 176], "rare": [4, 7, 10, 13, 15, 17, 20, 27, 52, 53, 55, 56, 57, 66, 72, 78, 80, 84, 93, 96, 99, 105, 106, 109, 112, 115, 118, 120, 121, 124, 129, 133, 140, 143, 148, 151, 164, 173, 174, 177], "sporting": [12, 45, 58, 63, 64, 67, 73, 75, 76, 79, 82, 86, 87, 89, 90, 100, 102, 116, 144, 172, 179, 180, 181, 186], "terriers": [3, 11, 19, 28, 39, 48, 51, 70, 101, 111, 117, 123, 126, 128, 131, 134, 159, 160, 167, 168, 169, 170, 182, 183, 185], "toys": [1, 46, 59, 60, 77, 104, 108, 122, 127, 137, 138, 145, 149, 162, 163, 166, 187], "working": [5, 6, 32, 43, 50, 71, 88, 91, 92, 113, 114, 125, 130, 147, 153, 154, 156, 165, 171]]
  8.   set gBreedDatabaseByWorld to ["africa": [20, 23, 33, 66, 94, 98, 122, 142, 148, 152, 155], "australi": [16, 17, 19, 166], "eeurope": [1, 43, 57, 68, 69, 71, 84, 85, 86, 87, 88, 91, 113, 118, 127, 145, 150, 153, 171, 179, 180], "england": [3, 26, 28, 36, 48, 49, 50, 54, 56, 67, 74, 75, 76, 79, 82, 89, 95, 106, 117, 123, 125, 126, 128, 131, 134, 135, 136, 139, 151, 160, 168, 170, 172, 181, 182, 184, 185, 187], "ewasia": [2, 5, 60, 61, 62, 77, 108, 114, 115, 119, 138, 149, 162, 163, 173, 174, 175, 176, 177], "ireland": [38, 39, 51, 65, 70, 90, 99, 100, 101, 102, 103, 111, 158, 159, 161, 167, 169, 183], "mideast": [4, 13, 52, 104], "namerica": [6, 7, 8, 9, 10, 11, 12, 14, 21, 22, 34, 35, 41, 47, 58, 59, 64, 96, 107, 112, 116, 120, 130, 143, 164, 178], "nasia": [40, 55, 109, 156, 165], "samerica": [15, 80, 97, 140], "scandina": [81, 132, 133], "weurope": [18, 24, 25, 27, 29, 30, 31, 32, 37, 42, 44, 45, 46, 53, 63, 72, 73, 78, 83, 92, 93, 105, 110, 121, 124, 129, 137, 141, 144, 146, 147, 154, 157, 186]]
  9. end
  10.